9990 FORI=1TO9:POKE630+I,13:NEXT:POKE632,82:POKE633,85:POKE634,78:POKE198,9:SYSC(20):GOTO9999
12010 GOSUB16950:DD=D(3):UD=D(4):DT=0:CS$="":PRINT:IFND=0ANDFRE(0)<4000THEN9990